From: Michael Albinus Date: Mon, 28 Sep 2009 11:56:13 +0000 (+0000) Subject: * net/tramp-smb.el (tramp-smb-handle-directory-files-and-attributes): X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~10252 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=8bcf94108e5f97d01f41919a23e9d7309439d610;p=emacs.git * net/tramp-smb.el (tramp-smb-handle-directory-files-and-attributes): Use `tramp-compat-handle-file-attributes'. --- diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el index 26edcf8b1c8..86cbe641d99 100644 --- a/lisp/net/tramp-smb.el +++ b/lisp/net/tramp-smb.el @@ -323,10 +323,8 @@ PRESERVE-UID-GID is completely ignored." "Like `directory-files-and-attributes' for Tramp files." (mapcar (lambda (x) - ;; We cannot call `file-attributes' for backward compatibility reasons. - ;; Its optional parameter ID-FORMAT is introduced with Emacs 22. - (cons x (tramp-smb-handle-file-attributes - (if full x (expand-file-name x directory)) id-format))) + (cons x (tramp-compat-handle-file-attributes + (if full x (expand-file-name x directory)) id-format))) (directory-files directory full match nosort))) (defun tramp-smb-handle-file-attributes (filename &optional id-format)